home *** CD-ROM | disk | FTP | other *** search
/ Gekikoh Dennoh Club 2 / Gekikoh Dennoh Club Vol. 2 (Japan).7z / Gekikoh Dennoh Club Vol. 2 (Japan) (Track 01).bin / fsw / zm302 / zm302_s.lzh / MPSRC045.LZH / P8_0103.HAS < prev    next >
Text File  |  1996-06-16  |  2KB  |  92 lines
  1. *=======================================================
  2. *
  3. *    ８ｂｉｔＰＣＭ 5.2kHz変換
  4. *
  5. *=======================================================
  6.  
  7. PCM8_0103_mac    macro        _vol
  8.  
  9.         moveq.l        #(MIX_SIZE/3)*2-1,d6
  10.         add.l        a0,d6
  11.         cmp.l        a3,d6
  12.         bcs        @f            * 今回の処理中にはトラップしない
  13.  
  14.         * トラップ判定付きの変換
  15.         moveq.l        #(MIX_SIZE/3)*2-1-1,d6
  16. 2:        cmpa.l        a3,a0            * トラップアドレス判定
  17.         bcs        1f
  18.         jsr        (a4)            * トラップ!
  19. 1:        move.b        (a0)+,d0        * PCMデータ取り込み
  20.         ext.w        d0            * 符号拡張
  21.         VOLUME        _vol,d0,d2
  22.         add.w        d0,(a1)+
  23.         add.w        d0,(a1)+
  24.         add.w        d0,(a1)+
  25.         dbra        d6,2b
  26.  
  27. *        ラストの１回
  28.         cmpa.l        a3,a0
  29.         bcs        1f
  30.         jsr        (a4)            * トラップ!
  31. 1:        move.b        (a0)+,d0        * PCMデータ取り込み
  32.         ext.w        d0            * 符号拡張
  33.         move.w        d0,CH_LAST_PCM(a5)    * 前回変換終了時のPCM値 = d0.w
  34.         VOLUME        _vol,d0,d2
  35.         move.w        d0,CH_LAST_VPCM(a5)    * 最後のPCM値(音量変換後)
  36.         add.w        d0,(a1)+
  37.         add.w        d0,(a1)+
  38.         add.w        d0,(a1)+
  39.  
  40.         move.l        a0,CH_PCM_ADR(a5)    * PCMアドレス = a0.l
  41.  
  42.         rts
  43.  
  44.  
  45.         * トラップ無しの変換
  46.  
  47. @@:        moveq.l        #(MIX_SIZE/3)*2-1-1,d6
  48. 2:        move.b        (a0)+,d0        * PCMデータ取り込み
  49.         ext.w        d0            * 符号拡張
  50.         VOLUME        _vol,d0,d2
  51.         add.w        d0,(a1)+
  52.         add.w        d0,(a1)+
  53.         add.w        d0,(a1)+
  54.         dbra        d6,2b
  55.  
  56. *        ラストの１回
  57.         move.b        (a0)+,d0        * PCMデータ取り込み
  58.         ext.w        d0            * 符号拡張
  59.         move.w        d0,CH_LAST_PCM(a5)    * 前回変換終了時のPCM値 = d0.w
  60.         VOLUME        _vol,d0,d2
  61.         move.w        d0,CH_LAST_VPCM(a5)    * 最後のPCM値(音量変換後)
  62.         add.w        d0,(a1)+
  63.         add.w        d0,(a1)+
  64.         add.w        d0,(a1)+
  65.  
  66.         move.l        a0,CH_PCM_ADR(a5)    * PCMアドレス = a0.l
  67.  
  68.         rts
  69.   
  70.         endm
  71.  
  72. *=======================================================
  73.  
  74. PCM8_0103_v00:    PCM8_0103_mac    0
  75. PCM8_0103_v01:    PCM8_0103_mac    1
  76. PCM8_0103_v02:    PCM8_0103_mac    2
  77. PCM8_0103_v03:    PCM8_0103_mac    3
  78. PCM8_0103_v04:    PCM8_0103_mac    4
  79. PCM8_0103_v05:    PCM8_0103_mac    5
  80. PCM8_0103_v06:    PCM8_0103_mac    6
  81. PCM8_0103_v07:    PCM8_0103_mac    7
  82. PCM8_0103_v08:    PCM8_0103_mac    8
  83. PCM8_0103_v09:    PCM8_0103_mac    9
  84. PCM8_0103_v10:    PCM8_0103_mac    10
  85. PCM8_0103_v11:    PCM8_0103_mac    11
  86. PCM8_0103_v12:    PCM8_0103_mac    12
  87. PCM8_0103_v13:    PCM8_0103_mac    13
  88. PCM8_0103_v14:    PCM8_0103_mac    14
  89. PCM8_0103_v15:    PCM8_0103_mac    15
  90. PCM8_0103_vnn:    PCM8_0103_mac    'n'
  91. PCM8_0103_non:    PCM8_0103_mac    'x'
  92.